home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programmierung
/
Power-Programmierung (Tewi)(1994).iso
/
magazine
/
pcmagazi
/
1992
/
02
/
quick1.wfw
< prev
next >
Wrap
Text File
|
1991-12-31
|
823b
|
33 lines
WORDSTAR QUICK KEYS FOR WINWORD 2.0
Sub MAIN
Begin Dialog UserDialog 411, 150, "Quick Menu"
PushButton 260, 73, 98, 22, "&RTop of doc"
PushButton 261, 125, 108, 22, "&CEnd of Doc"
PushButton 95, 7, 88, 21, "&Previous"
PushButton 13, 98, 103, 22, "&SLeft of Line"
PushButton 133, 98, 114, 22, "&DRight of Line"
PushButton 90, 73, 112, 21, "&ETop of Screen"
PushButton 82, 125, 130, 21, "&XBottom of Screen"
CancelButton 350, 2, 59, 22
End Dialog
Dim QuickMenu As UserDialog
Button = Dialog(QuickMenu)
If Button = 1 Then
StartOfDocument
ElseIf Button = 2 Then
EndOfDocument
ElseIf Button = 3 Then
GoBack
ElseIf Button = 4 Then
StartOfLine
ElseIf Button = 5 Then
EndOfLine
ElseIf Button = 6 Then
StartOfWindow
ElseIf Button = 7 Then
EndOfWindow
End If
End Sub